www.gusucode.com > 地方成人教育中心整站源代码 1 > 地方成人教育中心整站源代码 1.0/manage/Admin_AdminEdit.asp
<!--#include file="conn.asp"-->
<!--#include file="chkuser.asp"-->
<!--#include file="../inc/md5.asp"-->
<!--#include file="Function/Function_Admin.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="copyright" content="Copyright 2008 dananshan.com" />
<meta name="Author" content="闪电文章管理系统技术支持---www.dananshan.com" />
<meta name="Keywords" content="闪电文章管理系统文章管理系统" />
<meta name="Description" content="闪电文章管理系统文章管理系统" />
<title>添加系统管理员</title>
<link href="style.css" rel="stylesheet" type="text/css" />
<script src="../js/check.js" type="text/javascript"></script>
<script src="../js/ajax.js" type="text/javascript"></script>
</head>
<body>
<%
'========判断是否具有管理权限
if Instr(session("AdminPower"),"|92,")=0 then
response.write ("<font color='red')>你不具有该管理模块的操作权限，请返回！</font>")
response.end
else
if Request.QueryString ("Form")="Edit" then
call Edit_Content()
else
call Add_Content()
end if
end if
%>
</body>
</html>
<%
Function Add_Content()
response.Write "<form method='post' action='?action=add'>"
response.Write "<div id='frame_Toolbar' class='toolbarBg'> "
response.Write "<a href='javascript:self.history.back();' class='icoBtn_ct'><span class='btnIco btnBack'></span><span class='btnTxt'>返回</span></a> "
response.Write "<a href='javascript:self.location.reload();' class='icoBtn_ct'><span class='btnIco btnReload'></span><span class='btnTxt'>刷新</span></a> "
response.Write "<span class='split ftSplit' ></span>"
response.Write "<div id='guide' class='light_orange'>请填写管理员信息！</div>"
response.Write "<div class='pageInfo right light_gray'></div>"
response.Write "</div>"
response.Write "<table class='cTable_2 table'>"
response.Write "<tr class='cTitle toolbarBg'>"
response.Write "<td width='15%'><div>添加管理员</div></td>"
response.Write "<td width='85%'></td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td class='tRight'>用户名：</td>"
response.Write "<td><input name='UserName' type='text' id='UserName' size='30' onBlur='check_UserName(this.value);'/>"
response.Write "<input name='Working' type='checkbox' id='Working' value='checkbox' checked>有效 "
response.Write "<span id='span_UserName'>请填写用户名(字母或数字)</span> </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td class='tRight'>密 码：</td>"
response.Write "<td><input name='Password' type='password' id='Password' size='40' onBlur='check_Password();'/> "
response.Write "<span id='span_Password'>请填写密码(不能含中文且大于6个字符)</span></td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td class='tRight'>确认密码：</td>"
response.Write "<td><input name='vPassword' type='password' id='vPassword' size='40' onBlur='check_vPassword();'/> "
response.Write "<span id='span_vPassword'>请填写确认密码</span> </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td valign='top' class='tRight'>操作权限：</td>"
response.Write "<td><table width='100%' border='0' cellspacing='0' cellpadding='0' style='border:0;'>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P11' type='checkbox' id='P11' value='|11,'>查看企业信息 "
response.Write "<input name='P12' type='checkbox' id='P12' value='|12,'>添加企业信息 "
response.Write "<input name='P21' type='checkbox' id='P21' value='|21,'>添加新闻类别 "
response.Write "<input name='P22' type='checkbox' id='P22' value='|22,'>查看新闻资讯 "
response.Write "<input name='P23' type='checkbox' id='P23' value='|23,'>添加新闻资讯 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P2101' type='checkbox' id='P2101' value='|2101,'>添加教师培训 "
response.Write "<input name='P2201' type='checkbox' id='P2201' value='|2201,'>查看教师培训 "
response.Write "<input name='P2301' type='checkbox' id='P2301' value='|2301,'>添加教师培训 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P2102' type='checkbox' id='P2102' value='|2102,'>添加学历教育 "
response.Write "<input name='P2202' type='checkbox' id='P2202' value='|2202,'>查看学历教育 "
response.Write "<input name='P2302' type='checkbox' id='P2302' value='|2302,'>添加学历教育 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P2103' type='checkbox' id='P2103' value='|2103,'>添加幼师培养 "
response.Write "<input name='P2203' type='checkbox' id='P2203' value='|2203,'>查看幼师培养 "
response.Write "<input name='P2303' type='checkbox' id='P2303' value='|2303,'>添加幼师培养 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P2104' type='checkbox' id='P2104' value='|2104,'>添加教学管理 "
response.Write "<input name='P2204' type='checkbox' id='P2204' value='|2204,'>查看教学管理 "
response.Write "<input name='P2304' type='checkbox' id='P2304' value='|2304,'>添加教学管理 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P2105' type='checkbox' id='P2105' value='|2105,'>添加学术研究 "
response.Write "<input name='P2205' type='checkbox' id='P2205' value='|2205,'>查看学术研究 "
response.Write "<input name='P2305' type='checkbox' id='P2305' value='|2305,'>添加学术研究 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P2106' type='checkbox' id='P2106' value='|2106,'>添加学科建设 "
response.Write "<input name='P2206' type='checkbox' id='P2206' value='|2206,'>查看学科建设 "
response.Write "<input name='P2306' type='checkbox' id='P2306' value='|2306,'>添加学科建设 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P31' type='checkbox' id='P31' value='|31,'>查看解决方案 "
response.Write "<input name='P32' type='checkbox' id='P32' value='|32,'>添加解决方案 "
response.Write "<input name='P41' type='checkbox' id='P41' value='|41,'>添加产品类别 "
response.Write "<input name='P42' type='checkbox' id='P42' value='|42,'>查看产品信息 "
response.Write "<input name='P43' type='checkbox' id='P43' value='|43,'>添加产品信息 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P51' type='checkbox' id='P51' value='|51,'>添加下载类别 "
response.Write "<input name='P52' type='checkbox' id='P52' value='|52,'>查看资源下载 "
response.Write "<input name='P53' type='checkbox' id='P53' value='|53,'>添加资源下载 "
response.Write "<input name='P61' type='checkbox' id='P61' value='|61,'>查看人才招聘 "
response.Write "<input name='P62' type='checkbox' id='P62' value='|62,'>添加人才招聘 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P71' type='checkbox' id='P71' value='|71,'>查看留言信息 "
response.Write "<input name='P72' type='checkbox' id='P72' value='|72,'>查看人才信息 "
response.Write "<input name='P81' type='checkbox' id='P81' value='|81,'>上传文件管理 "
response.Write "<input name='P91' type='checkbox' id='P91' value='|91,'>查看管理员 "
response.Write "<input name='P92' type='checkbox' id='P92' value='|92,'>添加管理员 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P101' type='checkbox' id='P101' value='|101,'>添加相册类别 "
response.Write "<input name='P102' type='checkbox' id='P102' value='|102,'>查看企业相册 "
response.Write "<input name='P103' type='checkbox' id='P103' value='|103,'>添加企业相册 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P01' type='checkbox' id='P01' value='|01,'>网站设置 "
response.Write "<input name='P02' type='checkbox' id='P02' value='|02,'>栏目设置 "
response.Write "<input name='P03' type='checkbox' id='P03' value='|03,'>上传设置 "
response.Write "<input name='P04' type='checkbox' id='P04' value='|04,'>数据库操作 "
response.Write "<input name='P05' type='checkbox' id='P05' value='|05,'>友情链接 "
response.Write "<input name='P06' type='checkbox' id='P06' value='|06,'>专题活动</td>"
response.Write "</tr>"
response.Write "</table></td>"
response.Write "</tr>"
response.Write "</table>"
response.Write "<div id='cEndToolbar' class='toolbarBg'>"
response.Write "<div class='caButCase'>"
response.Write "<input type='submit' name='Btn_OK' id='Btn_OK' disabled='disabled' value='确认添加' class='button'> "
response.Write "<input type='reset' name='Submit2' value='清空重填' class='button'>"
response.Write "</div>"
response.Write "</div>"
response.Write "</form>"
End Function
Function Edit_Content()
ID=trim(request("ID"))
if ID<>"" and IsNumeric(ID) then
sql="select * from Idea_Admin where ID="&ID
set rs=idea.exec(sql,1)
do while not rs.eof
AdminPower=rs("AdminPower")
response.Write "<form method='post' action='?action=update&ID="&ID&"'>"
response.Write "<div id='frame_Toolbar' class='toolbarBg'> "
response.Write "<a href='javascript:self.history.back();' class='icoBtn_ct'><span class='btnIco btnBack'></span><span class='btnTxt'>返回</span></a> "
response.Write "<a href='javascript:self.location.reload();' class='icoBtn_ct'><span class='btnIco btnReload'></span><span class='btnTxt'>刷新</span></a> "
response.Write "<span class='split ftSplit' ></span>"
response.Write "<div id='guide' class='light_orange'>请填写管理员信息！</div>"
response.Write "<div class='pageInfo right light_gray'></div>"
response.Write "</div>"
response.Write "<table class='cTable_2 table'>"
response.Write "<tr class='cTitle toolbarBg'>"
response.Write "<td width='15%'><div>编辑管理员</div></td>"
response.Write "<td width='85%'></td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td class='tRight'>用户名：</td>"
response.Write "<td><input name='UserName' type='text' id='UserName' size='30' value='"&rs("UserName")&"' disabled='disabled'/>"
if rs("Working")=true then
response.Write "<input name='Working' type='checkbox' id='Working' value='checkbox' checked>有效 "
else
response.Write "<input name='Working' type='checkbox' id='Working' value='checkbox'>有效 "
end if
response.Write "<span id='span_UserName'>请填写新用户名(字母或数字)</span> </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td class='tRight'>密 码：</td>"
response.Write "<td><input name='Password' type='password' id='Password' size='40'onBlur='check_Password1();'/> "
response.Write "<span id='span_Password'>请填写新密码(不修改不填写)</span></td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td class='tRight'>确认密码：</td>"
response.Write "<td><input name='vPassword' type='password' id='vPassword' size='40' onBlur='check_vPassword1();'/> "
response.Write "<span id='span_vPassword'>请填写确认密码</span> </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td valign='top' class='tRight'>操作权限：</td>"
response.Write "<td><table width='100%' border='0' cellspacing='0' cellpadding='0' style='border:0;'>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P11' type='checkbox' id='P11' value='|11,'"
if Instr(AdminPower,"|11,")>0 then response.write ("checked")
response.Write ">查看学校信息 "
response.Write "<input name='P12' type='checkbox' id='P12' value='|12,'"
if Instr(AdminPower,"|12,")>0 then response.write ("checked")
response.Write ">添加学校信息 "
response.Write "<input name='P21' type='checkbox' id='P21' value='|21,'"
if Instr(AdminPower,"|21,")>0 then response.write ("checked")
response.Write ">添加新闻类别 "
response.Write "<input name='P22' type='checkbox' id='P22' value='|22,'"
if Instr(AdminPower,"|22,")>0 then response.write ("checked")
response.Write ">查看新闻资讯 "
response.Write "<input name='P23' type='checkbox' id='P23' value='|23,'"
if Instr(AdminPower,"|23,")>0 then response.write ("checked")
response.Write ">添加新闻资讯 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P2101' type='checkbox' id='P2101' value='|2101,'"
if Instr(AdminPower,"|2101,")>0 then response.write ("checked")
response.Write ">查看教师培训 "
response.Write "<input name='P2201' type='checkbox' id='P2201' value='|2201,'"
if Instr(AdminPower,"|2201,")>0 then response.write ("checked")
response.Write ">添加教师培训 "
response.Write "<input name='P2301' type='checkbox' id='P2301' value='|2301,'"
if Instr(AdminPower,"|2301,")>0 then response.write ("checked")
response.Write ">添加教师培训 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P2102' type='checkbox' id='P2102' value='|2102,'"
if Instr(AdminPower,"|2102,")>0 then response.write ("checked")
response.Write ">查看学历教育 "
response.Write "<input name='P2202' type='checkbox' id='P2202' value='|2202,'"
if Instr(AdminPower,"|2202,")>0 then response.write ("checked")
response.Write ">添加学历教育 "
response.Write "<input name='P2302' type='checkbox' id='P2302' value='|2302,'"
if Instr(AdminPower,"|2302,")>0 then response.write ("checked")
response.Write ">添加学历教育 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P2103' type='checkbox' id='P2103' value='|2103,'"
if Instr(AdminPower,"|2103,")>0 then response.write ("checked")
response.Write ">查看幼师培训 "
response.Write "<input name='P2203' type='checkbox' id='P2203' value='|2203,'"
if Instr(AdminPower,"|2203,")>0 then response.write ("checked")
response.Write ">添加幼师培训 "
response.Write "<input name='P2303' type='checkbox' id='P2303' value='|2303,'"
if Instr(AdminPower,"|2303,")>0 then response.write ("checked")
response.Write ">添加幼师培训 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P2104' type='checkbox' id='P2104' value='|2104,'"
if Instr(AdminPower,"|2104,")>0 then response.write ("checked")
response.Write ">查看教学管理 "
response.Write "<input name='P2204' type='checkbox' id='P2204' value='|2204,'"
if Instr(AdminPower,"|2204,")>0 then response.write ("checked")
response.Write ">添加教学管理 "
response.Write "<input name='P2304' type='checkbox' id='P2304' value='|2304,'"
if Instr(AdminPower,"|2304,")>0 then response.write ("checked")
response.Write ">添加教学管理训 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P2105' type='checkbox' id='P2105' value='|2105,'"
if Instr(AdminPower,"|2105,")>0 then response.write ("checked")
response.Write ">查看学术研究 "
response.Write "<input name='P2205' type='checkbox' id='P2205' value='|2205,'"
if Instr(AdminPower,"|2205,")>0 then response.write ("checked")
response.Write ">添加学术研究 "
response.Write "<input name='P2305' type='checkbox' id='P2305' value='|2305,'"
if Instr(AdminPower,"|2305,")>0 then response.write ("checked")
response.Write ">添加学术研究 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P2106' type='checkbox' id='P2106' value='|2106,'"
if Instr(AdminPower,"|2106,")>0 then response.write ("checked")
response.Write ">查看学科建设 "
response.Write "<input name='P2206' type='checkbox' id='P2206' value='|2206,'"
if Instr(AdminPower,"|2206,")>0 then response.write ("checked")
response.Write ">添加学科建设训 "
response.Write "<input name='P2306' type='checkbox' id='P2306' value='|2306,'"
if Instr(AdminPower,"|2306,")>0 then response.write ("checked")
response.Write ">添加学科建设 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P31' type='checkbox' id='P31' value='|31,'"
if Instr(AdminPower,"|31,")>0 then response.write ("checked")
response.Write ">查看解决方案 "
response.Write "<input name='P32' type='checkbox' id='P32' value='|32,'"
if Instr(AdminPower,"|32,")>0 then response.write ("checked")
response.Write ">添加解决方案 "
response.Write "<input name='P41' type='checkbox' id='P41' value='|41,'"
if Instr(AdminPower,"|41,")>0 then response.write ("checked")
response.Write ">添加产品类别 "
response.Write "<input name='P42' type='checkbox' id='P42' value='|42,'"
if Instr(AdminPower,"|42,")>0 then response.write ("checked")
response.Write ">查看产品信息 "
response.Write "<input name='P43' type='checkbox' id='P43' value='|43,'"
if Instr(AdminPower,"|43,")>0 then response.write ("checked")
response.Write ">添加产品信息 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P51' type='checkbox' id='P51' value='|51,'"
if Instr(AdminPower,"|51,")>0 then response.write ("checked")
response.Write ">添加下载类别 "
response.Write "<input name='P52' type='checkbox' id='P52' value='|52,'"
if Instr(AdminPower,"|52,")>0 then response.write ("checked")
response.Write ">查看资源下载 "
response.Write "<input name='P53' type='checkbox' id='P53' value='|53,'"
if Instr(AdminPower,"|53,")>0 then response.write ("checked")
response.Write ">添加资源下载 "
response.Write "<input name='P61' type='checkbox' id='P61' value='|61,'"
if Instr(AdminPower,"|61,")>0 then response.write ("checked")
response.Write ">查看人才招聘 "
response.Write "<input name='P62' type='checkbox' id='P62' value='|62,'"
if Instr(AdminPower,"|62,")>0 then response.write ("checked")
response.Write ">添加人才招聘 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P71' type='checkbox' id='P71' value='|71,'"
if Instr(AdminPower,"|71,")>0 then response.write ("checked")
response.Write ">查看留言信息 "
response.Write "<input name='P72' type='checkbox' id='P72' value='|72,'"
if Instr(AdminPower,"|72,")>0 then response.write ("checked")
response.Write ">查看人才信息 "
response.Write "<input name='P81' type='checkbox' id='P81' value='|81,'"
if Instr(AdminPower,"|81,")>0 then response.write ("checked")
response.Write ">上传文件管理 "
response.Write "<input name='P91' type='checkbox' id='P91' value='|91,'"
if Instr(AdminPower,"|91,")>0 then response.write ("checked")
response.Write ">查看管理员 "
response.Write "<input name='P92' type='checkbox' id='P92' value='|92,'"
if Instr(AdminPower,"|92,")>0 then response.write ("checked")
response.Write ">添加管理员 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P101' type='checkbox' id='P101' value='|101,'"
if Instr(AdminPower,"|101,")>0 then response.write ("checked")
response.Write ">添加相册类别 "
response.Write "<input name='P102' type='checkbox' id='P102' value='|102,'"
if Instr(AdminPower,"|102,")>0 then response.write ("checked")
response.Write ">查看企业相册 "
response.Write "<input name='P103' type='checkbox' id='P103' value='|103,'"
if Instr(AdminPower,"|103,")>0 then response.write ("checked")
response.Write ">添加企业相册 </td>"
response.Write "</tr>"
response.Write "<tr>"
response.Write "<td style='border:0;margin:0;padding:0;'>"
response.Write "<input name='P01' type='checkbox' id='P01' value='|01,'"
if Instr(AdminPower,"|01,")>0 then response.write ("checked")
response.Write ">网站设置 "
response.Write "<input name='P02' type='checkbox' id='P02' value='|02,'"
if Instr(AdminPower,"|02,")>0 then response.write ("checked")
response.Write ">栏目设置 "
response.Write "<input name='P03' type='checkbox' id='P03' value='|03,'"
if Instr(AdminPower,"|03,")>0 then response.write ("checked")
response.Write ">上传设置 "
response.Write "<input name='P04' type='checkbox' id='P04' value='|04,'"
if Instr(AdminPower,"|04,")>0 then response.write ("checked")
response.Write ">数据库操作 "
response.Write "<input name='P05' type='checkbox' id='P05' value='|05,'"
if Instr(AdminPower,"|05,")>0 then response.write ("checked")
response.Write ">友情链接 "
response.Write "<input name='P06' type='checkbox' id='P06' value='|06,'"
if Instr(AdminPower,"|06,")>0 then response.write ("checked")
response.Write ">专题活动</td>"
response.Write "</tr>"
response.Write "</table></td>"
response.Write "</tr>"
response.Write "</table>"
response.Write "<div id='cEndToolbar' class='toolbarBg'>"
response.Write "<div class='caButCase'>"
response.Write "<input type='submit' name='Btn_OK' id='Btn_OK' value='确认更新' class='button'> "
response.Write "<input type='reset' name='Submit2' value='清空重填' class='button'>"
response.Write "</div>"
response.Write "</div>"
response.Write "</form>"
rs.movenext
loop
rs.close
set rs=nothing
end if
End Function
%>